object Addtomenu: TAddtomenu
  Left = 191
  Top = 158
  ActiveControl = ProgName
  BorderIcons = [biHelp]
  BorderStyle = bsDialog
  Caption = 'Add to menu'
  ClientHeight = 143
  ClientWidth = 427
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Position = poScreenCenter
  Scaled = False
  OnActivate = FormActivate
  PixelsPerInch = 120
  TextHeight = 16
  object NameLabel: TLabel
    Left = 8
    Top = 43
    Width = 41
    Height = 13
    Caption = 'Name'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object ParameterLabel: TLabel
    Left = 8
    Top = 72
    Width = 73
    Height = 13
    Caption = 'Parameters:'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object RunAsLabel: TLabel
    Left = 8
    Top = 99
    Width = 49
    Height = 13
    Caption = 'Run as:'
  end
  object FysNameLabel: TLabel
    Left = 8
    Top = 16
    Width = 33
    Height = 17
    Caption = 'File:'
  end
  object LocateItem: TSpeedButton
    Left = 304
    Top = 8
    Width = 25
    Height = 25
    OnClick = LocateItemClick
  end
  object ProgName: TEdit
    Left = 81
    Top = 40
    Width = 215
    Height = 24
    HelpContext = 710
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
  end
  object bOK: TButton
    Left = 339
    Top = 8
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 3
  end
  object bCancel: TButton
    Left = 339
    Top = 42
    Width = 75
    Height = 25
    Caption = 'Cancel'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    TabOrder = 4
  end
  object Parameter: TEdit
    Left = 81
    Top = 68
    Width = 215
    Height = 24
    HelpContext = 720
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
  end
  object ShowState: TComboBox
    Left = 81
    Top = 96
    Width = 215
    Height = 24
    HelpContext = 725
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 16
    Items.Strings = (
      'Normal window'
      'Minimized window'
      'Maximized window')
    ParentFont = False
    TabOrder = 2
    Text = 'Normal window'
  end
  object FysName: TEdit
    Left = 80
    Top = 12
    Width = 217
    Height = 24
    TabOrder = 5
  end
end